home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Disc to the Future 2
/
Disc to the Future Part II Programmer's Reference (Wayzata Technology)(6013)(1992).bin
/
MAC
/
MPW_TOOL
/
TOOLS
/
TOOLS_WI
/
ICON_8
/
ICONT_FO
/
ICONT.R
< prev
next >
Wrap
Text File
|
1989-03-05
|
6KB
|
297 lines
/*
Commando dialog definition for the Icon Programming Language
translator and linker (icont).
*/
#include "Cmdo.r"
#include "Types.r"
resource 'cmdo' (128) {
{ /* array dialogs: 2 elements */
/* [1] */
295,
"Icont ╤ Icon Programming Language Translator & Linker. "
"Clicking on any control will display a help message in this box.",
{ /* array itemArray */
/* [1] */
NotDependent {},
MultiFiles {
"Input File(s)╔",
"Choose the source (.icn) & icode (.u1) files you "
"wish to include.",
/*{30, 24, 54, 132},*/
{30, 76, 54, 184},
"Source & Ucode Files:",
"",
MultiInputFiles {
{ /* array MultiTypesArray: 1 elements */
/* [1] */
/*text*/ /* .u? files are not TEXT */
},
".icn",
"Files ending in .icn",
/*"All text files"*/
"All files"
}
},
/* [2] */
Or {
{1}
},
Files {
InputOrOutputFile,
OptionalFile {
{117, 261, 133, 429},
{133, 261, 152, 429},
"Icode File Name",
"Root name of 1st file",
"-o",
" (root name)",
"This is the name to give to the executable "
"program (icode file). The default is the root "
"portion of the first source or ucode file specified.",
dim,
"Default icode file",
"Select existing icode file╔",
"Create new icode file╔"
},
Additional {
"-o",
"",
"",
"",
{ /* array TypesArray */
text
}
}
},
/* [3] */
NotDependent {
},
NestedDialog {
2,
{166, 150, 182, 300},
"Table Size Options╔",
"Translator and linker table sizes may b"
"e specified with this button."
},
/* [4] */
NotDependent {},
Redirection {
StandardInput,
{30, 210}
},
/* [5] */
NotDependent {},
Redirection {
StandardOutput,
{30, 338}
},
/* [6] */
NotDependent {},
Redirection {
DiagnosticOutput,
{68, 274}
},
/* [7] */
NotDependent {},
TextBox {
gray,
{20, 200, 112, 460},
"Input and Output Redirection"
},
/* [8] */
NotDependent {},
CheckOption {
NotSet,
{68, 24, 84, 190},
"Translate only",
"-c",
"Translate source files to create ucode files only "
"╤ do not link."
},
/* [9] */
NotDependent {},
CheckOption {
NotSet,
{92, 24, 108, 190},
"Suppress messages",
"-s",
"Suppress output of non-error, informative messages."
},
/* [10] */
NotDependent {},
CheckOption {
NotSet,
{116, 24, 132, 190},
"Trace",
"-t",
"Give keyword &trace an initial value of -1 when "
"program is executed."
},
/* [11] */
NotDependent {},
CheckOption {
NotSet,
{140, 24, 156, 240},
"Warn undeclared identifiers",
"-u",
"Issue warning messages for undeclared identifiers."
},
NotDependent {},
PictOrIcon {
Icon, 128, {24, 24, 56, 56},
},
NotDependent {},
Box {
gray,
{18, 18, 62, 62}
}
},
/* [2] */
280,
"Use this dialog to alter translator "
"and linker table sizes.",
{
NotDependent {},
RegularEntry {
"Constant table",
{24, 112, 40, 248},
{24, 24, 40, 102},
"100",
true,
"-Sc",
"Size of constant table."
},
NotDependent {},
RegularEntry {
"Field table",
{48, 112, 64, 248},
{48, 24, 64, 102},
"100",
true,
"-Sf",
"Size of field table."
},
NotDependent {},
RegularEntry {
"Global symbol table",
{72, 112, 88, 248},
{72, 24, 88, 102},
"200",
true,
"-Sg",
"Size of global symbol table."
},
NotDependent {},
RegularEntry {
"Identifier table",
{96, 112, 112, 248},
{96, 24, 112, 102},
"500",
true,
"-Si",
"Size of identifier table."
},
NotDependent {},
RegularEntry {
"Local symbol table",
{120, 112, 136, 248},
{120, 24, 136, 102},
"100",
true,
"-Sl",
"Size of local symbol table."
},
NotDependent {},
RegularEntry {
"Line number table",
{144, 112, 160, 248},
{144, 24, 160, 102},
"1000",
true,
"-Sn",
"Size of line number table."
},
NotDependent {},
RegularEntry {
"Record table",
{24, 358, 40, 478},
{24, 270, 40, 348},
"100",
true,
"-Sr",
"Size of record table."
},
NotDependent {},
RegularEntry {
"String space",
{48, 358, 64, 478},
{48, 270, 64, 348},
"20000",
true,
"-Ss",
"Size of string space."
},
NotDependent {},
RegularEntry {
"Tree space",
{72, 358, 88, 478},
{72, 270, 88, 348},
"15000",
true,
"-St",
"Size of tree space."
},
NotDependent {},
RegularEntry {
"Code buffer",
{96, 358, 112, 478},
{96, 270, 112, 348},
"15000",
true,
"-SC",
"Size of code buffer."
},
NotDependent {},
RegularEntry {
"File names",
{120, 358, 136, 478},
{120, 270, 136, 348},
"10",
true,
"-SF",
"Size of file name table."
},
NotDependent {},
RegularEntry {
"Labels",
{144, 358, 160, 478},
{144, 270, 160, 348},
"500",
true,
"-SL",
"Size of label table."
}
}
}
};
/*
This is the ICON resource that creates the icon for the icon logo
for the Icon Programming Language.
*/
resource 'ICON' (128) {
$"0003 0000 000C 0000 001C 0000 0038 0000"
$"0033 8000 0006 C000 000C 6000 0006 0000"
$"0033 1800 0079 3C00 00CC 6630 00CC 6638"
$"0278 3C9C 0630 19CC 0C00 0362 88C0 0622"
$"8D80 0060 6730 18C0 7278 3C80 38CC 6600"
$"18CC 6600 0079 3C00 0031 9800 0000 C000"
$"000C 6000 0006 C000 0003 9800 0000 3800"
$"0000 7000 0000 6000 0001 80"
};